home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 1998 November / IRIX 6.5.2 Base Documentation November 1998.img / usr / share / catman / p_man / cat3 / complib / dlapy3.z / dlapy3
Text File  |  1998-10-30  |  1KB  |  67 lines
  1.  
  2.  
  3.  
  4. DDDDLLLLAAAAPPPPYYYY3333((((3333FFFF))))                                                          DDDDLLLLAAAAPPPPYYYY3333((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      DLAPY3 - return sqrt(x**2+y**2+z**2), taking care not to cause
  10.      unnecessary overflow
  11.  
  12. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      DOUBLE PRECISION FUNCTION DLAPY3( X, Y, Z )
  14.  
  15.          DOUBLE       PRECISION X, Y, Z
  16.  
  17. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  18.      DLAPY3 returns sqrt(x**2+y**2+z**2), taking care not to cause unnecessary
  19.      overflow.
  20.  
  21.  
  22. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  23.      X       (input) DOUBLE PRECISION
  24.              Y       (input) DOUBLE PRECISION Z       (input) DOUBLE PRECISION
  25.              X, Y and Z specify the values x, y and z.
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42.  
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.